
Partial Class WebForm_ManageFinanceForecast_TCPopup
    Inherits System.Web.UI.Page

    Protected Sub Page_LoadComplete(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.LoadComplete
        If Not IsPostBack Then
            Me.TCReport1.DataBind()
            Me.LoadData()
        End If

        Me.Title = String.Format("Popup ( {0} )", ShowMode)
    End Sub

    Protected Sub LoadData()
        SearchOption1.CopyTo(TCReport1.SearchOption)
        TCReport1.SearchOption.OnSubmit(EventArgs.Empty)
    End Sub

    Protected ReadOnly Property ShowMode() As String
        Get
            Return Request("ShowMode")
        End Get
    End Property

    Public ReadOnly Property ViewPoint() As String
        Get
            Return Session("TC_ViewPoint")
        End Get
    End Property

    Public ReadOnly Property HeaderTB() As String
        Get
            Return Me.ViewPoint.Replace("SF", "").Replace("TC", "").Replace("SM", "")
        End Get
    End Property
End Class
